home *** CD-ROM | disk | FTP | other *** search
/ Inter.Net 55-1 / Inter.Net 55-1.iso / CBuilder / Setup / BCB / data.z / qrextra.hpp < prev    next >
Encoding:
C/C++ Source or Header  |  1998-02-09  |  7.3 KB  |  205 lines
  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1998 by Borland International
  3. // All rights reserved
  4.  
  5. // (DO NOT EDIT: machine generated header) 'qrextra.pas' rev: 3.00
  6.  
  7. #ifndef qrextraHPP
  8. #define qrextraHPP
  9. #include <DBTables.hpp>
  10. #include <qrdatasu.hpp>
  11. #include <qrexpbld.hpp>
  12. #include <Qrcomped.hpp>
  13. #include <Qrctrls.hpp>
  14. #include <quickrpt.hpp>
  15. #include <qrprntr.hpp>
  16. #include <Clipbrd.hpp>
  17. #include <Db.hpp>
  18. #include <Printers.hpp>
  19. #include <Dialogs.hpp>
  20. #include <Forms.hpp>
  21. #include <Buttons.hpp>
  22. #include <Graphics.hpp>
  23. #include <ExtCtrls.hpp>
  24. #include <StdCtrls.hpp>
  25. #include <Controls.hpp>
  26. #include <Classes.hpp>
  27. #include <SysUtils.hpp>
  28. #include <Windows.hpp>
  29. #include <SysInit.hpp>
  30. #include <System.hpp>
  31.  
  32. //-- user supplied -----------------------------------------------------------
  33.  
  34. namespace Qrextra
  35. {
  36. //-- type declarations -------------------------------------------------------
  37. typedef System::AnsiString qrextra__2[201];
  38.  
  39. class DELPHICLASS TQRAsciiExportFilter;
  40. class PASCALIMPLEMENTATION TQRAsciiExportFilter : public Qrprntr::TQRExportFilter 
  41. {
  42.     typedef Qrprntr::TQRExportFilter inherited;
  43.     
  44. private:
  45.     int LineCount;
  46.     System::AnsiString Lines[201];
  47.     System::TextFile aFile;
  48.     Extended XFactor;
  49.     Extended YFactor;
  50.     
  51. protected:
  52.     virtual System::AnsiString __fastcall GetFilterName(void);
  53.     virtual System::AnsiString __fastcall GetDescription(void);
  54.     virtual System::AnsiString __fastcall GetExtension(void);
  55.     
  56. public:
  57.     virtual void __fastcall Start(int PaperWidth, int PaperHeight, Graphics::TFont* Font);
  58.     virtual void __fastcall EndPage(void);
  59.     virtual void __fastcall Finish(void);
  60.     virtual void __fastcall NewPage(void);
  61.     virtual void __fastcall TextOut(Extended X, Extended Y, Graphics::TFont* Font, Graphics::TColor BGColor
  62.         , Classes::TAlignment Alignment, System::AnsiString Text);
  63. public:
  64.     /* TQRExportFilter.Create */ __fastcall TQRAsciiExportFilter(System::AnsiString Filename) : Qrprntr::
  65.         TQRExportFilter(Filename) { }
  66.     
  67. public:
  68.     /* TObject.Destroy */ __fastcall virtual ~TQRAsciiExportFilter(void) { }
  69.     
  70. };
  71.  
  72. class DELPHICLASS TQRBuilder;
  73. class PASCALIMPLEMENTATION TQRBuilder : public Classes::TComponent 
  74. {
  75.     typedef Classes::TComponent inherited;
  76.     
  77. private:
  78.     bool FActive;
  79.     Graphics::TFont* FFont;
  80.     TPrinterOrientation FOrientation;
  81.     Quickrpt::TQuickRep* FReport;
  82.     System::AnsiString FTitle;
  83.     Classes::TStrings* NameList;
  84.     
  85. protected:
  86.     System::AnsiString __fastcall NewName(System::AnsiString AClassName);
  87.     virtual void __fastcall BuildFramework(void);
  88.     void __fastcall RenameObjects(void);
  89.     virtual void __fastcall SetActive(bool Value);
  90.     virtual void __fastcall SetOrientation(Printers::TPrinterOrientation Value);
  91.     virtual void __fastcall SetTitle(System::AnsiString Value);
  92.     
  93. public:
  94.     __fastcall virtual TQRBuilder(Classes::TComponent* AOwner);
  95.     __fastcall virtual ~TQRBuilder(void);
  96.     Quickrpt::TQuickRep* __fastcall FetchReport(void);
  97.     __property bool Active = {read=FActive, write=SetActive, nodefault};
  98.     __property Graphics::TFont* Font = {read=FFont, write=FFont};
  99.     __property Printers::TPrinterOrientation Orientation = {read=FOrientation, write=SetOrientation, nodefault
  100.         };
  101.     __property Quickrpt::TQuickRep* Report = {read=FReport, write=FReport};
  102.     __property System::AnsiString Title = {read=FTitle, write=SetTitle};
  103. };
  104.  
  105. class DELPHICLASS TQRListBuilder;
  106. class PASCALIMPLEMENTATION TQRListBuilder : public Qrextra::TQRBuilder 
  107. {
  108.     typedef Qrextra::TQRBuilder inherited;
  109.     
  110. private:
  111.     Db::TDataSet* FDataSet;
  112.     Classes::TStrings* FFields;
  113.     void __fastcall SetFields(Classes::TStrings* Value);
  114.     
  115. protected:
  116.     virtual void __fastcall SetActive(bool Value);
  117.     virtual void __fastcall BuildList(void);
  118.     
  119. public:
  120.     __fastcall virtual TQRListBuilder(Classes::TComponent* AOwner);
  121.     __fastcall virtual ~TQRListBuilder(void);
  122.     void __fastcall AddAllFields(void);
  123.     __property Db::TDataSet* DataSet = {read=FDataSet, write=FDataSet};
  124.     __property Classes::TStrings* Fields = {read=FFields, write=SetFields};
  125. };
  126.  
  127. class DELPHICLASS TQREditor;
  128. class PASCALIMPLEMENTATION TQREditor : public Controls::TCustomControl 
  129. {
  130.     typedef Controls::TCustomControl inherited;
  131.     
  132. private:
  133.     Quickrpt::TQRDesigner* FDesigner;
  134.     Extctrls::TPanel* FToolbar;
  135.     Qrprntr::TQRToolbar* EditorToolbar;
  136.     Qrprntr::TQRToolbar* QuickRepToolbar;
  137.     Qrprntr::TQRToolbar* CustomBandToolbar;
  138.     Qrprntr::TQRToolbar* CustomLabelToolbar;
  139.     Qrprntr::TQRToolbar* ExprToolbar;
  140.     Qrprntr::TQRToolbar* ShapeToolbar;
  141.     Extctrls::TPanel* FEditPanel;
  142.     Forms::TScrollBox* FEditArea;
  143.     System::AnsiString FFilename;
  144.     Classes::TNotifyEvent FOnNewReport;
  145.     Classes::TNotifyEvent FOnOpenReport;
  146.     Classes::TNotifyEvent FOnCloseReport;
  147.     Classes::TNotifyEvent FOnSaveReport;
  148.     Quickrpt::TQuickRep* FReport;
  149.     Extctrls::TPanel* FStatusBar;
  150.     Forms::TForm* HiddenForm;
  151.     void __fastcall InitButtons(void);
  152.     void __fastcall SetReport(Quickrpt::TQuickRep* Value);
  153.     
  154. protected:
  155.     bool __fastcall GetEditing(void);
  156.     virtual void __fastcall ClickButton(System::TObject* Sender);
  157.     virtual void __fastcall SetSelectedComponent(System::TObject* Sender);
  158.     
  159. public:
  160.     __fastcall virtual TQREditor(Classes::TComponent* AOwner);
  161.     __fastcall virtual ~TQREditor(void);
  162.     void __fastcall CloseReport(void);
  163.     void __fastcall DataSetup(void);
  164.     void __fastcall ReportLayout(void);
  165.     void __fastcall NewReport(void);
  166.     void __fastcall OpenReport(void);
  167.     void __fastcall OpenReportFile(System::AnsiString aFilename);
  168.     void __fastcall SaveReport(void);
  169.     void __fastcall SaveReportFile(System::AnsiString aFilename);
  170.     __property Quickrpt::TQRDesigner* Designer = {read=FDesigner};
  171.     __property Forms::TScrollBox* EditArea = {read=FEditArea};
  172.     __property bool Editing = {read=GetEditing, nodefault};
  173.     __property System::AnsiString Filename = {read=FFilename, write=FFilename};
  174.     __property Quickrpt::TQuickRep* Report = {read=FReport, write=SetReport};
  175.     __property Extctrls::TPanel* StatusBar = {read=FStatusBar};
  176.     __property Extctrls::TPanel* ToolBar = {read=FToolbar};
  177.     
  178. __published:
  179.     __property Align ;
  180.     __property Classes::TNotifyEvent OnNewReport = {read=FOnNewReport, write=FOnNewReport};
  181.     __property Classes::TNotifyEvent OnOpenReport = {read=FOnOpenReport, write=FOnOpenReport};
  182.     __property Classes::TNotifyEvent OnCloseReport = {read=FOnCloseReport, write=FOnCloseReport};
  183.     __property Classes::TNotifyEvent OnSaveReport = {read=FOnSaveReport, write=FOnSaveReport};
  184. public:
  185.     /* TWinControl.CreateParented */ __fastcall TQREditor(HWND ParentWindow) : Controls::TCustomControl(
  186.         ParentWindow) { }
  187.     
  188. };
  189.  
  190. //-- var, const, procedure ---------------------------------------------------
  191. extern PACKAGE void __fastcall PopulateFontSizeCombo(Stdctrls::TComboBox* aCombo);
  192. extern PACKAGE Classes::TStrings* __fastcall AllDataSets(Forms::TForm* Form, bool IncludeDataModules
  193.     );
  194. extern PACKAGE Quickrpt::TQuickRep* __fastcall QRLoadReport(System::AnsiString Filename);
  195. extern PACKAGE void __fastcall QRFreeReport(Quickrpt::TQuickRep* aReport);
  196. extern PACKAGE void __fastcall QRCreateList(Quickrpt::TQuickRep* &AReport, Classes::TComponent* AOwner
  197.     , Db::TDataSet* aDataSet, System::AnsiString aTitle, Classes::TStrings* aFieldList);
  198.  
  199. }    /* namespace Qrextra */
  200. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  201. using namespace Qrextra;
  202. #endif
  203. //-- end unit ----------------------------------------------------------------
  204. #endif    // qrextra
  205.